﻿Public Class Debito
    'TODO HACER PROPIEDADES

#Region "Declaraciones"
    Private cId As Integer
    Private cImporte As Double
    Private cFarmacia As String
    Private cAno As Integer
    Private cMes As String
    Private cObraSocialXPlan As String
    Private cMotivo As String
    Private cFarmaciaId As Integer
    Private cPresentacionId As Integer

#End Region

#Region "Constructores"
    Public Sub New()
        cId = -1        
        cImporte = -1
        cFarmacia = ""        
        cObraSocialXPlan = ""
        cFarmaciaId = -1
        cAno = -1
        cMes = ""
        cMotivo = ""
        cPresentacionId = -1
    End Sub

    Public Sub New(ByVal pId As Integer, ByVal pImporte As Double, ByVal pFarmacia As String, ByVal pFarmaciaId As Integer, ByVal pAno As Integer, ByVal pMes As String, ByVal pObraSocialXPlan As String, ByVal pMotivo As String, ByVal pPresentacionId As Integer)
        cId = pId
        cImporte = pImporte
        cFarmacia = pFarmacia
        cObraSocialXPlan = pObraSocialXPlan
        cFarmaciaId = pFarmaciaId
        cAno = pAno
        cMes = pMes
        cMotivo = pMotivo
        cPresentacionId = pPresentacionId
    End Sub
#End Region

#Region "Propiedades"
    Public Property Id()
        Get
            Return cId
        End Get
        Set(ByVal value)
            cId = value
        End Set
    End Property

    Public Property Importe()
        Get
            Return cImporte
        End Get
        Set(ByVal value)
            cImporte = value
        End Set
    End Property

    Public Property Farmacia()
        Get
            Return cFarmacia
        End Get
        Set(ByVal value)
            cFarmacia = value
        End Set
    End Property

    Public Property Ano()
        Get
            Return cAno
        End Get
        Set(ByVal value)
            cAno = value
        End Set
    End Property

    Public Property Mes()
        Get
            Return cMes
        End Get
        Set(ByVal value)
            cMes = value
        End Set
    End Property

    Public Property FarmaciaId()
        Get
            Return cFarmaciaId
        End Get
        Set(ByVal value)
            cFarmaciaId = value
        End Set
    End Property

    Public Property ObraSocialXPlan()
        Get
            Return cObraSocialXPlan
        End Get
        Set(ByVal value)
            cObraSocialXPlan = value
        End Set
    End Property

    Public Property Motivo()
        Get
            Return cMotivo
        End Get
        Set(ByVal value)
            cMotivo = value
        End Set
    End Property

    Public Property PresentacionId()
        Get
            Return cPresentacionId
        End Get
        Set(ByVal value)
            cPresentacionId = value
        End Set
    End Property

#End Region
End Class
